Amiga Tools 3/Amiga Tools 3.iso/terminal/term/extras/source/gtlayout-source.lha/LTP_DrawBox.c

C/C++ Source or Header | 1995-09-29 | 4.5 KB | 198 lines

/*  GadTools layout toolkit
**
**  Copyright © 1993-1995 by Olaf `Olsen' Barthel
**  Freely distributable.
*/

#include "gtlayout_global.h"

VOID __regargs
LTP_DrawMultiLineButton(struct RastPort *RPort,WORD Left,WORD Top,WORD Width,WORD Height,struct ImageInfo *ImageInfo,BOOL Bold)
{
    WORD Len,ThisTop,ThisLeft;
    STRPTR *Lines = ImageInfo -> Lines;
    WORD LineCount = ImageInfo -> LineCount;
    STRPTR KeyStroke = ImageInfo -> KeyStroke;
    STRPTR Label;
    ULONG OldStyle,StyleFlags;

    if(Bold)
    {
        StyleFlags = FSF_BOLD;

        OldStyle = SetSoftStyle(RPort,FSF_BOLD,AskSoftStyle(RPort));
    }
    else
        StyleFlags = NULL;

    if(!LineCount)
        LineCount = 1;

    ThisTop = Top + (Height - LineCount * RPort -> TxHeight + 1) / 2 + RPort -> TxBaseline;

    do
    {
        if(LineCount && Lines)
            Label = *Lines++;
        else
            Label = ImageInfo -> Label;

        Len = strlen(Label);

        ThisLeft = Left + (Width - TextLength(RPort,Label,Len)) / 2;

        Move(RPort,ThisLeft,ThisTop);
        Text(RPort,Label,Len);

        if(KeyStroke)
        {
            if(KeyStroke >= Label && KeyStroke < Label + Len)
            {
                ULONG OldStyle;

                if(KeyStroke != Label)
                    ThisLeft += TextLength(RPort,Label,(ULONG)KeyStroke - (ULONG)(Label));

                OldStyle = SetSoftStyle(RPort,FSF_UNDERLINED | StyleFlags,AskSoftStyle(RPort));

                Move(RPort,ThisLeft,ThisTop);
                Text(RPort,KeyStroke,1);

                SetSoftStyle(RPort,StyleFlags | OldStyle & ~FSF_UNDERLINED,OldStyle);

                KeyStroke = NULL;
            }
        }

        ThisTop += RPort -> TxHeight;
    }
    while(--LineCount > 0);

    if(Bold)
        SetSoftStyle(RPort,OldStyle & ~FSF_BOLD,OldStyle);
}

VOID __regargs
LTP_DrawBox(struct RastPort *rp,struct DrawInfo *drawInfo,LONG left,LONG top,LONG width,LONG height,BOOLEAN selected,BOOLEAN ghosted,ImageInfo *imageInfo)
{
    UWORD        *pens = drawInfo -> dri_Pens;
    UWORD         pen1,pen2,pen3,pen4;
    ImageTypes     imageType = imageInfo -> ImageType;

    if(selected)
    {
        pen1 = SHADOWPEN;
        pen2 = SHINEPEN;
        pen3 = FILLPEN;
        pen4 = FILLTEXTPEN;
    }
    else
    {
        pen1 = SHINEPEN;
        pen2 = SHADOWPEN;
        pen3 = BACKGROUNDPEN;
        pen4 = TEXTPEN;
    }

    LTP_SetPens(rp,pens[pen1],0,JAM1);
    Move(rp,left + 1,top + 1);
    Draw(rp,left + 1,top + height - 2);
    Draw(rp,left,top + height - 1);
    Draw(rp,left,top);
    Draw(rp,left + width - 2,top);

    if(imageInfo -> Emboss)
    {
        Move(rp,left + 2,top + height - 3);
        Draw(rp,left + 2,top + 1);
        Draw(rp,left + width - 3,top + 1);

/*        Move(rp,left + 3,top + height - 4);*/
/*        Draw(rp,left + 3,top + 2);*/
/*        Draw(rp,left + width - 4,top + 2);*/
    }

    LTP_SetAPen(rp,pens[pen2]);
    Move(rp,left + width - 2,top + height - 2);
    Draw(rp,left + width - 2,top + 1);
    Draw(rp,left + width - 1,top);
    Draw(rp,left + width - 1,top + height - 1);
    Draw(rp,left + 1,top + height - 1);

    if(imageInfo -> Emboss)
    {
        Move(rp,left + width - 3,top + 2);
        Draw(rp,left + width - 3,top + height - 2);
        Draw(rp,left + 2,top + height - 2);

/*        Move(rp,left + width - 4,top + 3);*/
/*        Draw(rp,left + width - 4,top + height - 3);*/
/*        Draw(rp,left + 3,top + height - 3);*/
    }

    LTP_SetAPen(rp,pens[pen3]);

    if(imageInfo -> Emboss)
    {
        RectFill(rp,left + 3,top + 2,left + 2 + width - 6,top + 1 + height - 4);
/*        RectFill(rp,left + 4,top + 3,left + 2 + width - 7,top + 1 + height - 5);*/
    }
    else
        RectFill(rp,left + 2,top + 1,left + 2 + width - 5,top + 1 + height - 3);

    LTP_SetAPen(rp,pens[pen4]);

    switch(imageType)
    {
        case IMAGECLASS_PICKER:
        {
            LONG    Left    = left + 4,
                Top    = top + 2,
                Width    = width - 8,
                Height    = height - 4;

            LTP_DrawPicker(rp,FALSE,Left,Top,Width,Height);
            break;
        }

        case IMAGECLASS_MULTILINEBUTTON:

            if(imageInfo -> Emboss)
                LTP_DrawMultiLineButton(rp,left + 5,top + 3,width - 10,height - 6,imageInfo,TRUE);
            else
                LTP_DrawMultiLineButton(rp,left + 4,top + 2,width - 8,height - 4,imageInfo,FALSE);

            break;

        case IMAGECLASS_LEFTINCREMENTER:
        case IMAGECLASS_RIGHTINCREMENTER:

            LTP_DrawIncrementer(rp,imageType == IMAGECLASS_LEFTINCREMENTER,left + 2,top + 1,width - 4,height - 2);
            break;
#ifdef DO_TAPEDECK_KIND
        case IMAGECLASS_BACKWARD:
        case IMAGECLASS_FORWARD:
        case IMAGECLASS_PREVIOUS:
        case IMAGECLASS_NEXT:
        case IMAGECLASS_RECORD:
        case IMAGECLASS_PLAY:
        case IMAGECLASS_STOP:
        case IMAGECLASS_PAUSE:
        case IMAGECLASS_EJECT:
        case IMAGECLASS_REWIND:

            LTP_DrawTapeButton(rp,imageInfo,left,top,width,height,drawInfo -> dri_Resolution . X,drawInfo -> dri_Resolution . Y,pens[pen3]);
            break;
#endif    /* DO_TAPEDECK_KIND */
    }

    if(ghosted)
    {
        LTP_SetAPen(rp,pens[BACKGROUNDPEN]);

        SetAfPt(rp,(UWORD *)&checkPat,1);
        RectFill(rp,left,top,left + width - 1,top + height - 1);
        SetAfPt(rp,NULL,0);
    }
}